' TEST_MODE : COMPILE_ONLY_FAIL

dim as string s = "a"

select case s
case 0
end select
